Prepis z C++ do Delphi
Otázka od: Robert Plzak
14. 10. 2004 7:52
Zdravim profici...
Mam kod v C++ a potrebuji to dat do Delphi:
X1 = 32H, X2 = 30H, X3 = 32H, X4 = 3CH
--- C++ ---------------------------------
Pom1 = (X1 << 4) | (X2 and 0x0F);
Pom2 = ((X3 << 4) | (X4 and 0x0F)) >> 1;
Pom = 2.5 * 12.8 * Pom1 + 0.25 * Pom2;
MHz = Pom - 107;
--- Delphi ------------------------------
Pom1 := (X1 shl 4) or (X2 and $0F);
Pom2 := ((X3 shl 4) or (X4 and $0F)) shr 1;
Pom := 2.5 * 12.8 * Pom1 + 0.25 * Pom2;
MHz := Pom - 107;
-----------------------------------------
Vysledek by mel byt 92.3 ale neni 
Mam to spatne ?
Dik za radu a pekny den vsem...
R. Plzak
Odpovedá: Jiri Cincura
15. 10. 2004 10:53
Robert Plzak wrote:
> Zdravim profici...
>
> Mam kod v C++ a potrebuji to dat do Delphi:
> X1 = 32H, X2 = 30H, X3 = 32H, X4 = 3CH
>
> --- C++ ---------------------------------
> Pom1 = (X1 << 4) | (X2 and 0x0F);
> Pom2 = ((X3 << 4) | (X4 and 0x0F)) >> 1; Pom = 2.5 * 12.8 * Pom1 + 0.25
> * Pom2; MHz = Pom - 107;
>
> --- Delphi ------------------------------
> Pom1 := (X1 shl 4) or (X2 and $0F);
> Pom2 := ((X3 shl 4) or (X4 and $0F)) shr 1; Pom := 2.5 * 12.8 * Pom1 +
> 0.25 * Pom2; MHz := Pom - 107; -----------------------------------------
>
> Vysledek by mel byt 92.3 ale neni
> Mam to spatne ?
>
> Dik za radu a pekny den vsem...
>
> R. Plzak
No me v C++ and neprelozi. Pokud dam za and --> & tak 92.3 v zadnem pripade,
pokud --> && tak 92.3 taky ne.
Nejdrive posli spravny kod a pak ti nekdo pomuze.
--
Jiri Cincura
e-mail: mailto:jiri@cincura.net; mailto:xcincura@informatics.muni.cz
ICQ: 314711544
web: http://www.cincura.net; http://photo.cincura.net
---
Nekdo vidi veci, ktere existuji, a pta se - proc?. Ja snim o vecech, ktere
nikdy neexistovaly a ptam se - proc ne? (Robert Kennedy)
Odpovedá: Jiri Cincura
15. 10. 2004 11:23
Takze abych take rekl neco konferenci. Ten kod zde byl blbe (jak vstupy, tak
syntax). Tazatel uz to vyresil.
--
Jiri Cincura
e-mail: mailto:jiri@cincura.net; mailto:xcincura@informatics.muni.cz
ICQ: 314711544
web: http://www.cincura.net; http://photo.cincura.net
---
Nekdo vidi veci, ktere existuji, a pta se - proc?. Ja snim o vecech, ktere
nikdy neexistovaly a ptam se - proc ne? (Robert Kennedy)
Odpovedá: Martin Pisarik
15. 10. 2004 12:27
Podle me je & bitovy AND
a && je logicky AND
tj. 7 & 4 = 4
ale 7 && 4 je ( true AND true) a to je true a to je 1
> No me v C++ and neprelozi. Pokud dam za and --> & tak 92.3 v zadnem
pripade,
> pokud --> && tak 92.3 taky ne.
> Nejdrive posli spravny kod a pak ti nekdo pomuze.